﻿Module DataAccessConnection
    Public connection As New OracleClient.OracleConnection
    Public Sub openConnection()
        connection.ConnectionString = "Data Source=xe;User Id=pav1;Password=pav1;Integrated Security=no;"
        connection.Open()
    End Sub

    Public Sub closeConnection()
        connection.Close()
    End Sub
End Module
